From: Po Lu <luangruo@yahoo.com>
Date: Thu, 8 Feb 2024 02:32:28 +0000 (+0800)
Subject: Prevent echo area help message from being printed repeatedly
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~14^2~18^2~2628
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=ed2450e79b597e0306f14b542e934a90dfd9786f;p=emacs.git

Prevent echo area help message from being printed repeatedly

* src/keyboard.c (echo_dash): Detect echo_keystrokes_help
messages and return if they be present.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index cd6ccbd77d0..78ea1893ba1 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -580,7 +580,10 @@ echo_dash (void)
       idx = make_fixnum (SCHARS (KVAR (current_kboard, echo_string)) - 1);
       last_char = Faref (KVAR (current_kboard, echo_string), idx);
 
-      if (XFIXNUM (last_char) == '-' && XFIXNUM (prev_char) != ' ')
+      if ((XFIXNUM (last_char) == '-' && XFIXNUM (prev_char) != ' ')
+	  /* Or a keystroke help message.  */
+	  || (echo_keystrokes_help
+	      && XFIXNUM (last_char) == ')' && XFIXNUM (prev_char) == 'p'))
 	return;
     }